Skip to main content
This forum is closed to new posts and responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:

HCL Software Customer Support Portal for U.S. Federal Government clients
HCL Software Customer Support Portal

HCL Notes/Domino 8.5 Forum (includes Notes Traveler)

HCL Notes/Domino 8.5 Forum (includes Notes Traveler)
Previous Next
Subject: VBA Automation with PDF Mime Entity
Feedback Type: Question
Product Area: Other
Technical Area: Customization
Platform: Windows
Release: 8.5
Reproducible: Not applicable

Hello everyone, hopefully I'm in the right forum to post this question. I am trying to accomplish an automation email from Excel to Lotus via VBA and have had success in being able to attach Excel documents to a create email using VBA however I'm trying to alter it for PDF's. I have ran into an issue and have been trying to figure it out.

Hopefully someone could either let me know what I need to fix or point me in the right direction. I currently have this in my VBA code to create a MIME entity for the PDF document:

Set tmp1 = oItem.CreateChildEntity()
Set hdr = tmp1.createheader("Content-Disposition")
Call hdr.SetHeaderValAndParams("attachment; filename=" & Worksheets("Interface").Range("O7").Value & ".pdf")
Set stream = oSess.CreateStream()
stream.Open stAttachment1, "binary"
tmp1.SetContentFromBytes stream, "application/pdf", ENC_IDENTITY_BINARY
tmp1.EncodeContent ENC_BASE64
Call stream.Close

Any help would be appreicated.


Feedback number WEBB9HAP7J created by ~Anita Dwofreepulakoi on 03/17/2014

Status: Open
Comments:





Printer-friendly

Search this forum

Member Tools


RSS Feeds

 RSS feedsRSS
All forum posts RSS
All main topics RSS